program Deve;

uses
  FastMM4,
  FastCode,
  FastMove,
  Forms,
  Mainfrm in 'Mainfrm.pas' {MainDlg},
  ClinetSystemUnits in 'ClinetSystemUnits.pas',
  DmUints in 'DmUints.pas' {DM: TDataModule},
  Loginfrm in 'Loginfrm.pas' {LoginDlg},
  BaseChildfrm in 'BaseChildfrm.pas' {BaseChildDlg},
  BaseDialogfrm in 'BaseDialogfrm.pas' {BaseDialog},
  ExcelUnits in 'ExcelUnits.pas',
  DesignDocumentClientfrm in 'DesignDocumentClientfrm.pas' {DesignDocumentClientDlg},
  ProjectManageClientfrm in 'ProjectManageClientfrm.pas' {ProjectManageClientDlg},
  NewTaskfrm in 'NewTaskfrm.pas' {NewTaskDlg},
  WebClientfrm in 'WebClientfrm.pas' {WebClientDlg},
  StatManageClientfrm in 'StatManageClientfrm.pas' {StatManageClientDlg},
  ProductDownLoadClientfrm in 'ProductDownLoadClientfrm.pas' {ProductDownLoadClientDlg},
  TestManageClient in 'TestManageClient.pas' {TestManageChildfrm},
  TestCaseSOCREfrm in 'TestCaseSOCREfrm.pas' {TestCaseSOCREDlg},
  PlanManageClientfrm in 'PlanManageClientfrm.pas' {PlanManageClientDlg},
  AntManageClientfrm in 'AntManageClientfrm.pas' {AntManageClientDlg},
  TestHighQueryfrm in 'TestHighQueryfrm.pas' {TestHighQueryDlg},
  DayWorktableManageClientfrm in 'DayWorktableManageClientfrm.pas' {DayWorktableManageClientDlg},
  ReleaseManageClientfrm in 'ReleaseManageClientfrm.pas' {ReleaseManageClientDlg},
  GetSVNVerfrm in 'GetSVNVerfrm.pas' {GetSVNVerDlg},
  WorkOverTimeClientfrm in 'WorkOverTimeClientfrm.pas' {WorkOverTimeClient},
  DemandClientfrm in 'DemandClientfrm.pas' {DemandClientDlg},
  TickDateTimefrm in 'TickDateTimefrm.pas' {TickDateTimeDlg},
  ExtendWebClientfrm in 'ExtendWebClientfrm.pas' {ExtendWebClientDlg},
  ExtendWebManagefrm in 'ExtendWebManagefrm.pas' {ExtendWebManageDlg},
  DeveCalendarfrm in 'DeveCalendarfrm.pas' {DeveCalendarDlg},
  Activationfrm in 'Activationfrm.pas' {ActivationDlg},
  WarnBuckleScoreClientfrm in 'WarnBuckleScoreClientfrm.pas' {WarnBuckleScoreClientDlg},
  QuestionManageClientfrm in 'QuestionManageClientfrm.pas' {QuestionManageClientDlg},
  PrototypeClinetfrm in 'PrototypeClinetfrm.pas' {PrototypeClientDlg};

{$R *.res}
{$R resource.res}

begin
  Application.Initialize;
  if not ShowLoginDlg then Exit;
  Application.Title := 'DeveManage';
  Application.CreateForm(TMainDlg, MainDlg);
  Application.CreateForm(TDM, DM);
  Application.CreateForm(TDeveCalendarDlg, DeveCalendarDlg);
  Application.Run;
end.
